home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / dos / basic / qbware.exe / SCRLSLCT.BAS (.txt) < prev    next >
Encoding:
QuickBASIC Tokenized Source  |  1990-11-30  |  3.5 KB  |  93 lines
  1. NMALLOCY
  2.     LineWidth
  3. Heightd
  4. TblData
  5.     WinHandleL
  6. A1010
  7. A1010.Prep.Window
  8. ScrlSlct
  9. WinStack
  10. WinFrame
  11. WinPoint
  12. TblSlct4
  13. Heading
  14. A0561E
  15. A0561.LoadText
  16. FlSpecm
  17. Target
  18. Target.File
  19. Flcnt
  20. Count
  21. A0500
  22. A0500.Dim.Array
  23. FlFind)
  24. DirList
  25. A2000V
  26. A2000.NextDir
  27. XFname
  28. Fattr
  29. ftime
  30. fdatee
  31. Fsize1
  32. Fsize2p
  33. Fsize
  34.     Tot.FilesB
  35.     Tot.Fsizer
  36. Target.Dir@
  37. NextDir
  38. FindFile
  39. MenuText
  40. Location
  41. TColors
  42. TLength
  43. SText
  44.     StackSize
  45. A1000
  46. A1000.Window.Hskp
  47. Putline
  48. MaxWin
  49. ExitKeys
  50. TabLen'
  51. InitWin
  52. CngWin
  53. Frame
  54. Shade
  55. PushWin
  56. Putwind
  57. A1020
  58. A1020.PopWindow
  59. PopWin
  60.    ScrlSlct.Basf
  61. Copyright (c) 1988 Marcel Madonna*
  62. SCRLSLCT.BAS shows the use of the multiple select bar menu
  63.   with QBWARE.
  64.  Dim arrays for QB Syntax check only - we REDIM them later
  65.  Set up housekeeping for window drivers
  66. Assume you will see no flicker
  67. Change this value to 0 if the screen
  68. flickers
  69. Window stack - we keep screen images
  70. and other info heres
  71. Define maximum number of windows as 20
  72. we keep specific window data herem
  73. DOS file mask
  74. Get a count of matching filese
  75. Did we find any files?
  76. Initialize each element of array
  77. to 40 blanks
  78. There are no files in this directory
  79. Aborting sample program"
  80.    Each element of the array will be broken down into components
  81.    The layout of each item is:
  82.  Pos.
  83.  Description 
  84.  File Attributes
  85.  6-13
  86.  File creation time (HH:MM:SS)o
  87.  14-23   File creation date (MM-DD-
  88.  24-25   Low order file size
  89.  26-27   High order file size
  90.  28-39   File name
  91. Files"
  92.  was selected")
  93.